--TEST--
Check for fib(10)
--SKIPIF--
<?php if (!extension_loaded("scheme")) print "skip"; ?>
--FILE--
<?php 
$scheme = new Scheme();
$scheme->eval("
  (define (fib n)
    (if (< n 2)
      n
      (+ (fib (- n 1)) (fib (- n 2)))))

  (write (fib 10))
");
?>
--EXPECT--
55
